home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 September / macformat-004.iso / Demos / Asymptote / Examples / Utility Scripts / xrange < prev   
Encoding:
Text File  |  1994-06-15  |  365 b   |  14 lines  |  [TEXT/DWat]
  1. % xrange xstart xend
  2. % Fill the x vector with values from xstart to xend
  3.  
  4. % ARGUMENTS:
  5. %        xstart    -- starting x value
  6. %        xend        -- last x value
  7. %
  8. % DESCRIPTION:
  9. % Replace the x vector with x values ranging from xstart to xend.
  10. %
  11. % ---------------------------------------------------------------
  12. hide
  13. % Put 0 - 1 on the stack
  14. rpn index 1 - npts 1 - / &2 &1 - * &1 + >x